home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / castools.zip / FUNC1H.ASM < prev    next >
Assembly Source File  |  1990-01-05  |  1KB  |  39 lines
  1. Include multi.inc
  2. Include model.inc
  3.  
  4. ;==============================================================================
  5. ;
  6. ;   CAS function 01h -- Submit A Task
  7. ;
  8. ;   Format:
  9. ;               int CASSubmitTask (char *filespec)
  10. ;   Input:
  11. ;               pointer to ASCII path and filename for control file
  12. ;   Output:
  13. ;               Returns event handle if successful or negative error code
  14. ;==============================================================================
  15.  
  16.                 .CODE
  17. CASSubmitTask   PROC    arg1:PTR WORD
  18.  
  19.                 push    dx              ; save registers
  20.                 push    ds
  21.  
  22.                 mov     ax,MUX          ; load multiplex number
  23.                 mov     ah,al           ; move into ah
  24.                 mov     al,01h          ; CAS function 1
  25.         IF      @DataSize               ; large and medium models
  26.                 lds     dx,arg1         ; pointer to SFTR
  27.         ELSE
  28.                 mov     dx,arg1         ; pointer to SFTR
  29.         ENDIF
  30.                 int     2Fh
  31.  
  32.                 pop     ds              ; restore registers
  33.                 pop     dx
  34.                 ret
  35. CASSubmitTask   endp
  36.  
  37.                 END
  38.  
  39.